home *** CD-ROM | disk | FTP | other *** search
/ GameStar 1998 May / GameStar 05-1998 - Heft-CD.iso / DEMOS / Incoming / asc / arctic / arctic_arcade.mdl next >
Encoding:
Text File  |  1998-02-20  |  23.0 KB  |  1,119 lines

  1. drag_coeff    0.01        
  2. gravity        2.2
  3.  
  4. ;-------------------------------------------------------
  5.  
  6. ;type "PLASMA BOLT 1"        alien heavy cannon        rate 14    tank 28 fa & battle
  7. ;type "TRACER SHOT 1"        player ssm                rate 32
  8. ;type "ROCKET 1"            player light rocket        rate 4
  9. ;type "GUIDED MISSILE"        player guided missile    rate 64 heli 32 jetftr
  10. ;type "GREEN LASER"            player fixed gun        rate 2
  11. ;type "GREEN ENERGY LASER"    player fixed gun        rate 16 on gun turrets
  12. ;type "PLASMA BOLT 2"        alien medium cannon        rate 11
  13. ;type "PLASMA BOLT 3"        alien light cannon        rate 8
  14. ;type "ROCKET 2"            player heavy rocket        rate 20
  15. ;type "RED LASER"            player heavy gun        rate 4
  16. ;type "BLUE LASER"            player medium gun        rate -
  17. ;type "PURPLE LASER"        player light gun        rate 2
  18. ;type "BOMB 1"                ?                        rate -
  19. ;type "ENERGY 1"            alien special weapon    rate 32
  20. ;type "PLASMA BOLT 4"        alien bomb                rate 4 nom 32 free attack
  21. ;type "DESIGNATOR"            satellite attack weapon    rate 128
  22.  
  23. phasestart
  24.  
  25.  
  26. clear_flag all
  27. critical_group "ccentre"
  28.  
  29. ;-------------------------------------------------------
  30. ;-------------player units
  31.  
  32. create "helicopter"
  33.     label "PlayerCopter"
  34. ;    position 14500 -122 14500
  35.     position 14500 -122 16400
  36.     forward 0.5 0 -0.8 up 0 1 0
  37.     armed_with "PURPLE LASER"    rate 2
  38.     secondary_armed_with "GUIDED MISSILE" rate 64 rounds 20
  39.     inert
  40.  
  41. create hero "tank2"
  42.     label "P1hero"
  43.     position 16982 on ground 14883
  44.     forward 0 0 1 up 0 1 0
  45.     armed_with "RED LASER"    rate 4
  46.     secondary_armed_with "ROCKET 1" rate 32 rounds 20
  47.     task
  48.         wait_until flag 0 set
  49.         playercontrols
  50.         kill
  51.     end
  52.  
  53. create "mobaaa"
  54.     label "P2hero"
  55.     position 14450 -1700 11100
  56.     forward -1 0 0 up 0 1 0
  57.     armed_with "GREEN LASER"    rate 2
  58.     inert
  59.  
  60. create "mobaaa"
  61.     label "P7hero"
  62.     position 14400 -1235 22500
  63.     forward 0.5 0 -0.8 up 0 1 0
  64.     armed_with "GREEN LASER"    rate 2
  65.     inert
  66.  
  67. create "mobrack"
  68.     label "P7heroS"
  69.     position 13650 -1235 22500
  70.     forward 0.5 0 0.8 up 0 1 0
  71.     armed_with "GUIDED MISSILE"    rate 64
  72.     inert
  73.     task
  74.         slave_to "P7hero"
  75.     end
  76.  
  77. ;------------------------------------
  78. ;------------enemy turrets
  79.  
  80. ;-----------------phase 1 enemy turrets
  81. create "alnadubs"
  82.     label "gun7"
  83.     position 40500 on ground 30000
  84.     forward -1 0 0 up 0 1 0
  85.     armed_with "GREEN ENERGY LASER" rate 32
  86.     task
  87.         attack
  88.     end
  89.  
  90. create "alnadubs"
  91.     label "gun8"
  92.     position 36500 on ground 37000
  93.     forward -1 0 0 up 0 1 0
  94.     armed_with "GREEN ENERGY LASER" rate 32
  95.     task
  96.         attack
  97.     end
  98.  
  99. ;-----------------turret shields---------------------------
  100. createstatic "sshield"
  101.     no_colide "gun7"
  102.     die_with "sssgen7"
  103.     position 40500 on ground 30000
  104.  
  105. createstatic "sshield"
  106.     no_colide "gun8"
  107.     die_with "sssgen8"
  108.     position 36500 on ground 37000
  109.  
  110. ;-----------------small shields---------------------------
  111. createstatic "sshield"
  112.     no_colide "ssgen2"
  113.     die_with "ssgen2"
  114.     position 36000 on ground 56500
  115.  
  116. createstatic "sshield"
  117.     no_colide "ssgen3"
  118.     die_with "ssgen3"
  119.     position 31000 on ground 54000
  120.  
  121. createstatic "sshield"
  122.     no_colide "ssgen4"
  123.     die_with "ssgen4"
  124.     position 37500 on ground 53500
  125.  
  126. createstatic "sshield"
  127.     no_colide "ssgen5"
  128.     die_with "ssgen5"
  129.     position 49500 on ground 26000
  130.  
  131. ;-----------------big shields---------------------------
  132. createstatic "bshield"
  133.     no_colide "bsgen3"
  134.     die_with "bsgen3"
  135.     position 55000 on ground 40000
  136.  
  137. createstatic "bshield"
  138.     no_colide "bsgen2"
  139.     die_with "bsgen2"
  140.     position 52000 on ground 18500
  141.  
  142. createstatic "bshield"
  143.     no_colide "bsgen1"
  144.     die_with "bsgen1"
  145.     position 51000 on ground 49400
  146.  
  147. ;-------------------------------------------------------
  148. ;PHASE 1        TANK
  149. ;-------------------------------------------------------
  150.  
  151. #....................................................................
  152.     phasemessage 50 60
  153.     play_speech "follow waypoint marker"
  154. #....................................................................
  155.  
  156. playcdslow
  157.  
  158.  
  159. hud off
  160. camera
  161.     attached_to "hero"
  162.     position 600 -300 -600
  163.     pointing_at "hero"
  164.     dolly 0
  165.  
  166.  
  167. procedure "P1-bog"
  168.     wait_until "bog" destroyed
  169.     pause 10
  170.     camera_task
  171.         cam_pos -100 -100 -1000 attached_to "bog"
  172.         cam_focus "bog"
  173.  
  174.         cam_goto 50 -100 -50
  175.         cam_goto -50 -100 -100
  176.  
  177.         pause 50
  178.         cam_mode cockpit
  179.     end
  180. end_procedure terminate after 1 loops
  181.  
  182. ;------------------------------
  183. set_waypoint "sssgen8"
  184.  
  185. create "AItank2"
  186.     position 18179 on ground 19646
  187.     forward 1 0 0 up 0 1 0
  188.     armed_with "RED LASER" rate 8
  189.     task
  190.         goto 24249.2 on ground 27127.4
  191.         goto 29508.2 on ground 28851.3
  192.         attack "sssgen8"
  193.         attack "gun8"
  194.         attack "sssgen7"
  195.         attack "gun7"
  196.         goto 18179.7 on ground 19646.9
  197.         kill
  198.        end
  199.  
  200. create "AItank2"
  201.     position 19179 on ground 20646
  202.     forward 1 0 0 up 0 1 0
  203.     armed_with "RED LASER" rate 8
  204.     task
  205.         goto 24249.2 on ground 27127.4
  206.         goto 29508.2 on ground 28851.3
  207.         attack "sssgen7"
  208.         attack "gun7"
  209.         attack "sssgen8"
  210.         attack "gun8"
  211.         goto 18179.7 on ground 19646.9
  212.         kill
  213.  
  214.        end
  215.  
  216. pause 25
  217. camera cockpit
  218. set_flag 0
  219.  
  220. wait_until distance_between waypoint and "hero" <10000
  221. end_procedure "P1-bog"
  222.  
  223. #....................................................................
  224.     phasemessage 53 60
  225.     play_speech "destroy shield generator"
  226. #....................................................................
  227.  
  228. wait_until "sssgen8" destroyed 
  229. set_waypoint "sssgen7"
  230.  
  231. wait_until "sssgen7" destroyed 
  232. clear_waypoint
  233.  
  234. #....................................................................
  235.     phasemessage 58 60
  236.     play_speech "destroy alien AT-AT guns"
  237. #....................................................................
  238.  
  239. wait_until "gun7" destroyed
  240. and "gun8" destroyed
  241.  
  242. clear_waypoint
  243.  
  244. #....................................................................
  245. ;    phasemessage 22 50    ?????
  246. ;    play_speech ""
  247. #....................................................................
  248. pause 25
  249.  
  250. create "aivtol"
  251.     label "astrike1"
  252.     position 41500 -2800 15000
  253.     forward 0 0 1 up 0 1 0
  254.     armed_with "ROCKET 2" rate 1
  255.     task
  256.         goto 41500 -3200 28000
  257.         shoot "rad1"
  258.         goto 41500 -3200 32000
  259.         shoot "rad1"
  260.         set_flag 8
  261.         goto 28526 -4747 51700
  262.         set_flag 3
  263.         goto 10000 -4000 60000
  264.         kill
  265.     end
  266.  
  267. create "aivtol"
  268.     label "astrike2"
  269.     position 40500 -2800 17000
  270.     forward 0 0 1 up 0 1 0
  271.     armed_with "ROCKET 2" rate 1
  272.     task
  273.         goto 40500 -3200 26000
  274.         shoot "rad1"
  275.         goto 40500 -3200 30000
  276.         shoot "rad1"
  277.         goto 32553 -4264 47187
  278.         set_flag 3
  279.         goto 10000 -4000 60000
  280.         kill
  281.     end
  282.  
  283. camera_task
  284.     hud off
  285.     cam_pos 0 0 1000 attached_to "astrike1"
  286.     cam_focus "astrike2"
  287.  
  288.     cam_goto 1000 0 -1000
  289.     cam_focus "astrike1"
  290.     dolly 1
  291.     dollyspeed 0.1%
  292.  
  293.     cam_goto -1000 0 8000
  294. end
  295.  
  296. wait_until flag 8 set
  297. clear_flag 8
  298. pause 40
  299. startwave 0 -50 0 relative to "rad1" 0
  300. pause 5
  301. startwave 0 -50 0 relative to "rad1" 0
  302. pause 5
  303. startwave 0 -50 0 relative to "rad1" 0
  304. pause 5
  305. startwave 0 -50 0 relative to "rad1" 0
  306. explode "rad1"
  307.  
  308.  
  309.  
  310. wait_until flag 3 set
  311. pause 50
  312. set_inert "pad2"
  313. camera cockpit
  314.  
  315. set_waypoint "ssgen5"
  316. #....................................................................
  317.     phasemessage 50 60
  318.     play_speech "follow waypoint marker"
  319. #....................................................................
  320.  
  321.  
  322. wait_until distance_between "hero" and waypoint < 7000
  323.  
  324. generation_points
  325.     position 41012.3 on ground 13865.9 
  326.     position 42092.3 on ground 13880.7 
  327.     position 39578.8 on ground 14617.8 
  328.     position 41170.6 on ground 16245.6 
  329.  
  330. procedure "P1b"
  331.     create "atank"
  332.         position at generation point
  333.         towards "hero"
  334.         armed_with "RED LASER" rate 16
  335.         task
  336.             attack "hero"
  337.         end
  338. end_procedure terminate after 4 loops
  339.  
  340. wait_until proc "P1b" terminated
  341. #....................................................................
  342.     phasemessage 30 60
  343.     play_speech "incoming alien surface craft"
  344. #....................................................................
  345.  
  346.  
  347.  
  348. pause 50
  349. clear_waypoint
  350.  
  351. wait_until number_of "aland" = 0
  352.  
  353. set_waypoint "ssgen5"
  354. #....................................................................
  355.     phasemessage 53 60
  356.     play_speech "destroy shield generator"
  357. #....................................................................
  358. wait_until "ssgen5" destroyed
  359.  
  360. set_waypoint "abld5"
  361. #....................................................................
  362.     phasemessage 53 60
  363.     play_speech "destroy alien installation"
  364. #....................................................................
  365. wait_until "abld5" destroyed
  366.  
  367. set_waypoint "bsgen2"
  368. #....................................................................
  369.     phasemessage 53 60
  370.     play_speech "destroy shield generator"
  371. #....................................................................
  372. wait_until "bsgen2" destroyed
  373.  
  374. set_volatile "pad2"
  375. pause 25
  376. clear_flag 8
  377.  
  378. create "aivtol"
  379.     label "astrike3"
  380.     position 23502 -1992 28256
  381.     towards 27189 -1354 23633
  382.     armed_with "ROCKET 2" rate 0
  383.     task
  384.         set_vel 60
  385.         goto 27189 -1354 23633
  386.         goto 40861 -1330 22129
  387.         shoot "pad2"
  388.         shoot "pad2"
  389.         shoot "pad2"
  390.         shoot "pad2"
  391.         set_flag 8
  392.         goto 75227 -5366 32197
  393.         kill
  394.     end
  395.  
  396. camera_task
  397.     hud off
  398.     cam_pos 0 -100 1000 attached_to "astrike3"
  399.     cam_focus "astrike3"
  400.     pause 50
  401.     cam_goto 1000 -100 0
  402.     cam_goto 0 -100 -1000
  403.  
  404. ;    pause 50
  405.     cam_pos    39159 -1000 23399 
  406.  
  407.     pause 100
  408.  
  409.     cam_pos -1000 -250 0 attached_to "astrike3"
  410.     cam_focus "pad2"
  411. end
  412.  
  413. wait_until flag 8 set
  414. pause 100
  415. explode "pad2"
  416.  
  417. #....................................................................
  418.     phasemessage 10 60
  419.     play_speech "phase complete"
  420. #....................................................................
  421.  
  422. hud off
  423. camera
  424.     attached_to "hero"
  425.     position 600 -300 -600
  426.     pointing_at "pad2"
  427.     dolly 1
  428.     dollyspeed 0.1%
  429. pause 80
  430.  
  431. ;-------------------------------------------------------
  432. ;PHASE 2    GUNS
  433. ;-------------------------------------------------------
  434.  
  435. phasestart
  436.  
  437. #....................................................................
  438.     phasemessage 61 80
  439.     play_speech "defend installation"
  440. #....................................................................
  441.  
  442. clear_flag all
  443. clear_waypoint
  444.  
  445. kill group "vtol"
  446. kill group "aihuman"
  447. kill "P1hero"
  448.  
  449. switch_hero "P2hero"
  450.     task
  451.         wait_until flag 0 set
  452.         playercontrols
  453.     end
  454.  
  455. hud off
  456. camera
  457.     attached_to "hero"
  458.     position 600 -300 -600
  459.     pointing_at "hero"
  460.     dolly 0
  461.     pause 40
  462.     set_flag 0
  463.  
  464. camera cockpit
  465.  
  466.  
  467. ;-----------------------
  468. ;-----------------wave 1
  469.  
  470. procedure "a1"
  471.     create "lfighter"
  472.         position 11149.3 -2795.4 24777.3
  473.         towards "hero"
  474.         armed_with "PLASMA BOLT 3" rate 8
  475.         task
  476.             goto 15253.8 -735.4 16955
  477.             goto 14001.8 -2345.4 14158.9
  478.             goto 14723.5 -2915.4 10939.1
  479.             attack "hero"
  480.         end
  481.     pause 50
  482. end_procedure terminate after 4 loops
  483.  
  484. procedure "a2"
  485.     create "lfighter"
  486.         position 15934.9 -2825.4 22936.9
  487.  
  488.         towards "hero"
  489.         armed_with "PLASMA BOLT 3" rate 8
  490.         task
  491.             goto 13084.9 -1115.4 16496.9
  492.             goto 13744.9 -595.4 15106.9
  493.             goto 14001.8 -2000 14158.9
  494.             goto 14723.5 -2600 10939.1
  495.             attack "hero"
  496.         end
  497.     pause 50
  498. end_procedure terminate after 4 loops
  499. pause 10
  500.  
  501. wait_until number_of "aair" = 0
  502. end_procedure "a1"
  503. end_procedure "a2"
  504.  
  505. ;-----------------------
  506. ;-----------------wave 2
  507.  
  508. procedure "a1"
  509.     create "lfighter"
  510.         position 22589.4 -1447.12 15757.2
  511.         towards "hero"
  512.         armed_with "PLASMA BOLT 3" rate 8
  513.         task
  514.             goto 20742.9 -2477.12 15533.4
  515.             shoot "hero" bomb
  516.             goto 16851.3 -750 15061.7
  517.             goto 15354.4 -2517.12 12452.6
  518.             attack "hero"
  519.         end
  520.     pause 50
  521. end_procedure terminate after 4 loops
  522. pause 10
  523.  
  524. wait_until number_of "aair" = 0
  525. end_procedure "a1"
  526.  
  527. ;-----------------------
  528. ;-----------------wave 3
  529.  
  530. procedure "a1"
  531.     create "lfighter"
  532.         position 11149.3 -2795.4 24777.3
  533.         towards "hero"
  534.         armed_with "PLASMA BOLT 2" rate 8
  535.         task
  536.             do
  537. ;                goto 14253.8 -735.4 15955
  538.                 attack "replen1"
  539.                 attack
  540.             until "hero" destroyed
  541. ;            attack "hero"
  542.         end
  543.     pause 50
  544. end_procedure terminate after 3 loops
  545.  
  546. wait_until proc "a1" terminated
  547. wait_until number_of "aair" <=2
  548.  
  549. procedure "a1"
  550.     create "lfighter"
  551.         position 22589.4 -1447.12 15757.2
  552.         towards "hero"
  553.         armed_with "PLASMA BOLT 2" rate 8
  554.         task
  555.             goto 20742.9 -2477.12 15533.4
  556.             shoot "hero" bomb
  557.             goto 16851.3 -750 15061.7
  558.             goto 15354.4 -2517.12 12452.6
  559.             attack "hero"
  560.         end
  561.     pause 50
  562. end_procedure terminate after 4 loops
  563.  
  564.  
  565. wait_until number_of "aair" =0
  566. end_procedure "a1"
  567.  
  568. ;-----------------------
  569. ;-----------------wave 4
  570.  
  571. procedure "a1"
  572.     create "hfighter"
  573.         position 11076.3 -1132 9753.88
  574.  
  575.         towards "hero"
  576.         armed_with "PLASMA BOLT 3" rate 8
  577.         task
  578.             goto 11685.3 -2042 10008.3
  579.             goto 12801.7 -2782 10474.9
  580.             shoot "hero" bomb
  581.             attack "hero"
  582.         end
  583.     pause 50
  584. end_procedure terminate after 4 loops
  585. pause 10
  586.  
  587. wait_until number_of "fighters" =0
  588. end_procedure "a1"
  589.  
  590.  
  591. ;-----------------
  592.  
  593. #....................................................................
  594.     phasemessage 10 60
  595.     play_speech "phase complete"
  596. #....................................................................
  597.  
  598. pause 20
  599.  
  600. set_flag 10
  601.  
  602. hud off
  603. camera
  604.     attached_to "hero"
  605.     position 600 -300 -600
  606.     pointing_at "hero"
  607.     dolly 1
  608.     dollyspeed 0.1%
  609. pause 80
  610.  
  611. ;-------------------------------------------------------
  612. ;PHASE 3    HELICOPTER
  613. ;-------------------------------------------------------
  614.  
  615. phasestart
  616.  
  617. #....................................................................
  618.     phasemessage 63 60
  619.     play_speech "engage and destroy alien craft"
  620. #....................................................................
  621. playcdfast
  622.  
  623. clear_flag all
  624.  
  625. switch_hero "PlayerCopter"
  626.     task
  627.         wait_until flag 0 set
  628.          playercontrols
  629.     end
  630.  
  631.  
  632. camera_task
  633.     hud off
  634.     cam_pos 600 -200 -600 attached_to "hero"
  635.     cam_focus "hero"
  636.     dolly 0
  637.     set_flag 0
  638.  
  639.     cam_goto -600 -200 -600
  640.     wait_until distance_between "hero" and "replen1" > 500
  641.  
  642.     cam_mode cockpit
  643. end
  644.  
  645.  
  646. create "alnadubs"
  647.     label "gun4"
  648.     position 32500 on ground 59000
  649.     forward 1 0 0 up 0 1 0
  650.     armed_with "GREEN ENERGY LASER" rate 24
  651.     task
  652.         attack
  653.     end
  654.  
  655. create "alnadubs"
  656.     label "gun5"
  657.     position 31000 on ground 51000
  658.     forward 1 0 0 up 0 1 0
  659.     armed_with "GREEN ENERGY LASER" rate 24
  660.     task
  661.         attack
  662.     end
  663.  
  664.  
  665. critical_group "aihuman"
  666.  
  667. #------------------------
  668. #------create hover hanks
  669.  
  670. create "AItank2"
  671.     label "attack"
  672.     position 35385 on ground 45505
  673.     forward 0 0 1 up 0 1 0
  674.     armed_with "RED LASER" rate 7
  675.     task
  676.         wait_until flag 1 set
  677.         goto 34829.3 on ground 50211.6
  678.         goto 36643 on ground 52008.9
  679.         do
  680.             shoot "ssgen4" bomb
  681.         until "ssgen4" destroyed
  682.         do
  683.             shoot "abld4" bomb
  684.         until "abld4" destroyed
  685.  
  686.     end
  687.  
  688. create "AItank2"
  689.     position 36380 on ground 43810
  690.     forward 0 0 1 up 0 1 0
  691.     armed_with "RED LASER" rate 7
  692.     task
  693.         wait_until flag 1 set
  694.         goto 34829.3 on ground 50211.6
  695.         goto 34300 on ground 55666.2
  696.         do
  697.             shoot "ssgen2" bomb
  698.         until "ssgen2" destroyed
  699.         do
  700.             shoot "abld2" bomb
  701.         until "abld2" destroyed
  702.  
  703.  
  704.  
  705.     end
  706.  
  707. create "AItank2"
  708.     position 35691.8 on ground 41063.4
  709.     forward 0 0 1 up 0 1 0
  710.     armed_with "RED LASER" rate 7
  711.     task
  712.         wait_until flag 1 set
  713.         goto 34829.3 on ground 50211.6
  714.         goto 32904.6 on ground 53290.5
  715.         do
  716.             shoot "ssgen3" bomb
  717.         until "ssgen3" destroyed
  718.         do
  719.             shoot "abld3" bomb
  720.         until "abld3" destroyed
  721.     end
  722.  
  723. #------------------------------
  724. #------create alien hover hanks
  725.  
  726. procedure "a1"
  727.     create "atank"
  728.         position 30867 on ground 22602.8
  729.         armed_with "PLASMA BOLT 3" rate 16
  730.         task
  731.             goto 35644.4 on ground 22935.6
  732.             goto 40960.6 on ground 27364.7
  733.             attack group "aihuman"
  734.         end
  735.  
  736.     pause 50
  737. end_procedure terminate after 3 loops
  738. pause 10
  739.  
  740. #------------------------------------
  741. #------waypoint to closest enemy tank
  742. procedure "wp land"
  743.     set_waypoint nearest "aland"
  744. end_procedure
  745.  
  746.  
  747. wait_until proc "a1" terminated
  748. wait_until number_of "aland" <= 2
  749.  
  750.  
  751. create "lfighter"
  752.     position -17000 -3200 500 relative toxz "hero"
  753.     armed_with "PLASMA BOLT 3" rate 16
  754.     task
  755.         attack "hero"
  756.     end
  757.  
  758. create "lfighter"
  759.     position -17000 -3200 800 relative toxz "hero"
  760.     armed_with "PLASMA BOLT 3" rate 16
  761.     task
  762.         attack "hero"
  763.     end
  764.  
  765. procedure "a2"
  766.     wait_until number_of "aair"<3
  767.  
  768.     create "lfighter"
  769.         position 17000 -3200 500 relative toxz "hero"
  770.         armed_with "PLASMA BOLT 2" rate 16
  771.         task
  772.             attack group "aihuman"
  773.             attack "hero"
  774.         end
  775.  
  776.     pause 50
  777. end_procedure terminate after 8 loops
  778.  
  779. wait_until number_of "aland"=0
  780. end_procedure "wp land"
  781. clear_waypoint
  782.  
  783. wait_until number_of "aair"=0
  784. end_procedure "a2"
  785.  
  786.  
  787. ;---------------all tanks gone
  788. ;---------------all aair  gone
  789. ;-----------------------------
  790.  
  791. #....................................................................
  792.     phasemessage 58 60
  793.     play_speech "destroy alien AT-AT guns"
  794. #....................................................................
  795.  
  796. set_waypoint "gun4"
  797. wait_until "gun4" destroyed
  798. set_waypoint "gun5"
  799.  
  800. wait_until "gun4" destroyed and "gun5" destroyed
  801. clear_waypoint
  802. set_flag 1
  803.  
  804. #....................................................................
  805. ;    phasemessage 25 60    ?????
  806. ;    play_speech ""
  807. #....................................................................
  808.  
  809. procedure "a1"
  810.     wait_until number_of "aair"<3
  811.  
  812.     create "lfighter"
  813.         position 17000 -3200 500 relative toxz "hero"
  814.         towards "hero"
  815.         armed_with "PLASMA BOLT 3" rate 16
  816.         task
  817.             attack "hero"
  818.         end
  819.  
  820.     pause 50
  821. end_procedure terminate after 6 loops
  822.  
  823. procedure "a2"
  824.     wait_until number_of "fighters"<3
  825.  
  826.     create "hfighter"
  827.         position -17000 -3200 500 relative toxz "hero"
  828.         towards "hero"
  829.         armed_with "PLASMA BOLT 3" rate 16
  830.         task
  831.             attack "hero"
  832.         end
  833.  
  834.     pause 50
  835. end_procedure terminate after 6 loops
  836.  
  837. pause 30
  838. #....................................................................
  839.     phasemessage 24 60
  840.     play_speech "incoming aliens"
  841. #....................................................................
  842.  
  843. wait_until proc "a1" terminated
  844. wait_until proc "a2" terminated
  845.  
  846. wait_until number_of "aair" =0
  847. wait_until number_of "fighters" =0
  848.  
  849. #....................................................................
  850.     phasemessage 52 60
  851.     play_speech "destroy alien installation"
  852. #....................................................................
  853.  
  854. set_waypoint "ssgen2"
  855. wait_until "ssgen2"destroyed
  856. set_waypoint "abld2"
  857. wait_until "abld2"destroyed
  858.  
  859. set_waypoint "ssgen3"
  860. wait_until "ssgen3"destroyed
  861. set_waypoint "abld3"
  862. wait_until "abld3"destroyed
  863.  
  864. set_waypoint "ssgen4"
  865. wait_until "ssgen4"destroyed
  866. set_waypoint "abld4"
  867. wait_until "abld4"destroyed
  868.  
  869.  
  870. #....................................................................
  871.     phasemessage 10 60
  872.     play_speech "phase complete"
  873. #....................................................................
  874.  
  875. clear_waypoint
  876.  
  877. uncritical_group "aihuman"
  878.  
  879.  
  880. pause 20
  881.  
  882. hud off
  883. camera
  884.     attached_to "hero"
  885.     position 600 -300 -600
  886.     pointing_at "hero"
  887.     dolly 1
  888.     dollyspeed 0.1%
  889. pause 80
  890.  
  891.  
  892. ;-------------------------------------------------------
  893. ;PHASE 6        helicopter defend 2 mobile untils
  894. ;-------------------------------------------------------
  895.  
  896. phasestart
  897.  
  898. #....................................................................
  899.     phasemessage 62 60
  900.     play_speech "defend allied craft"
  901. #....................................................................
  902.  
  903. clear_flag all
  904. kill group "C-17"
  905. kill group "VTOL"
  906.  
  907. switch_hero "PlayerCopter"
  908.     task
  909.         position 14500 -122 16400
  910.         forward 0 0 1    up 0 1 0
  911.         wait_until flag 0 set
  912.         secondary_armed_with "GUIDED MISSILE" rate 32 rounds 20
  913.         playercontrols
  914.         position 14500 -122 16400
  915.     end
  916.  
  917. camera_task
  918.     hud off
  919.     cam_pos 600 -200 -600 attached_to "hero"
  920.     cam_focus "hero"
  921.     dolly 0
  922.     set_flag 0
  923.  
  924.     cam_goto -600 -200 -600
  925.     wait_until distance_between "hero" and "replen1" > 500
  926.  
  927.     cam_mode cockpit
  928. end
  929.  
  930. ;---------------------------------
  931. ;---------get me home please------
  932. create "mobplat"
  933.     label "mobile1"
  934.     armed_with "RED LASER" rate 4
  935.     mission_critical
  936.     position 16000 on ground 17000
  937.     forward 0 0 1 up 0 1 0
  938.     task
  939.         goto 18000 on ground 21000
  940.         goto 15500 on ground 30000
  941.         set_flag 2
  942.         stop
  943.         wait_until flag 2 clear
  944.         goto 9000 on ground 55000
  945.         stop
  946.         set_flag 1
  947.     end
  948.  
  949. create "mobrack"
  950.     label "mobile1guns"
  951.     fixed_to "mobile1" at 0 -60 0 
  952.     armed_with "GREEN LASER"    rate 24
  953.     task
  954.         do
  955.             defend "mobile1"
  956.                 break_task_if flag 2 set
  957.             wait_until flag 2 clear
  958.         forever
  959.     end
  960.  
  961. ;---------me too------------------
  962. create "momobrad"
  963.     label "mobile2"
  964.     mission_critical
  965.     position 17000 on ground 17500
  966.     forward 0 0 1 up 0 1 0
  967.     task
  968.         goto 19000 on ground 21000
  969.         goto 16500 on ground 30000
  970.         set_flag 2
  971.         stop
  972.         wait_until flag 2 clear
  973.         goto 9900 on ground 55900
  974.         stop
  975.     end
  976.  
  977. collision "mobile2" as "mobile1guns"
  978.  
  979. procedure "wp"
  980.     set_waypoint nearest "aihuman"
  981. end_procedure
  982.  
  983. ;----------------------------------
  984. ;-----------BADDIES
  985. ;-----------first wave
  986. set_flag 11
  987.  
  988. procedure "P6a"
  989.  
  990.     wait_until flag 2 clear
  991.  
  992.     wait_until flag 11 set
  993.     wait_until number_of "aair"<2
  994.  
  995.     create "lfighter"
  996.         position 17000 -3200 500 relative toxz "mobile1"
  997.         towards "hero"
  998.         armed_with "PLASMA BOLT 2" rate 24
  999.         task
  1000.             attack "mobile1"
  1001.             attack "mobile2"
  1002.         end
  1003.  
  1004.     clear_flag 11
  1005.     set_flag 14
  1006.     pause 50
  1007.  
  1008. end_procedure
  1009.  
  1010. procedure "P6b"
  1011.  
  1012.     wait_until flag 2 clear
  1013.     wait_until number_of "fighters"<1
  1014.  
  1015.     create "hfighter"
  1016.         position -17000 -3200 500 relative toxz "mobile1"
  1017.         towards "hero"
  1018.         armed_with "PLASMA BOLT 2" rate 24
  1019.         task
  1020.             attack "mobile2"
  1021.             attack "mobile1"
  1022.         end
  1023.  
  1024.     pause 50
  1025.  
  1026. end_procedure
  1027.  
  1028. procedure "P6c"
  1029.     wait_until flag 2 clear
  1030.     wait_until number_of "bombers"<1
  1031.  
  1032.     create "lbomber"
  1033.         position 500 -3200 17000 relative toxz "hero"
  1034.         towards "hero"
  1035.         armed_with "PLASMA BOLT 2" rate 24
  1036.         task
  1037.             attack "hero"
  1038.         end
  1039.  
  1040.     pause 50
  1041.  
  1042. end_procedure
  1043.  
  1044. procedure "P6d"
  1045.     wait_until flag 2 clear
  1046.     wait_until flag 14 set
  1047.     wait_until number_of "aair"<2
  1048.  
  1049.     create "lfighter"
  1050.         position 500 -3200 -17000 relative toxz "hero"
  1051.         towards "hero"
  1052.         armed_with "PLASMA BOLT 2" rate 24
  1053.         task
  1054.             attack "mobile2"
  1055.             attack "mobile1"
  1056.         end
  1057.  
  1058.     clear_flag 14
  1059.     set_flag 11
  1060.  
  1061.     pause 50
  1062. end_procedure
  1063.  
  1064. wait_until flag 2 set
  1065. pause 50
  1066.  
  1067. wait_until number_of "aair"=0
  1068. wait_until number_of "bombers"=0
  1069. wait_until number_of "fighters"=0
  1070.  
  1071. end_procedure "wp"
  1072.  
  1073. clear_flag 2
  1074. camera cockpit
  1075.  
  1076.  
  1077. procedure "wp"
  1078.     set_waypoint nearest "aihuman"
  1079. end_procedure
  1080.  
  1081.  
  1082. #....................................................................
  1083.     phasemessage 23 60
  1084.     play_speech "incoming"
  1085. #....................................................................
  1086.  
  1087.  
  1088. wait_until flag 1 set
  1089. ;----------------------------------
  1090.  
  1091. end_procedure "wp"
  1092. end_procedure "P6a"
  1093. end_procedure "P6b"
  1094. end_procedure "P6c"
  1095. end_procedure "P6d"
  1096. clear_waypoint
  1097.  
  1098. wait_until number_of "aair"=0
  1099. wait_until number_of "bombers"=0
  1100. wait_until number_of "fighters"=0
  1101.  
  1102. mission_uncritical "mobile1"
  1103. mission_uncritical "mobile2"
  1104.  
  1105. #....................................................................
  1106.     phasemessage 10 60
  1107.     play_speech "phase complete"
  1108. #....................................................................
  1109.  
  1110.  
  1111. set_inert "PlayerCopter"
  1112.  
  1113. pause 99999
  1114.  
  1115. ;-----------second wave
  1116. ;-------------------------------------------------------
  1117. ;END OF SCENARIO
  1118. ;-------------------------------------------------------
  1119.